ggplot2 code review